Office +CAPITOL HILL:special mac files for windows:
Strings
------
Macromedia Director
stxt
----
X
PH1
Offices of You Know
The Honorable r r
House of Representatives
Washington, D.C. 20515
Dear Representative r,
With the consideration of new health care regulation, an overwhelming task for lawmakers arises. As a physician and director of the A.D.A., I am well informed of the problems and costs of health care. The A.D.A. has studied various aspects of American medicine and has some sound advice for its impending rennovation. I will be in Washington with some of my colleagues next month. We will be bringing our message of cost reduction to Congress. If you are available for a luncheon or one of our informal evening gatherings, we would be honored by your attendance.
Sincerely,
Benjamin Daly, M.D.
Associate Director, A.D.A.
x
_
_
_
Script Channel Commands
--------------------
puppettransition 23
starttimer
play doneif BTYourOffice = FALSE then
set BTYourOffice = true
else
puppettransition 23
go "atdesk"
end ifglobal myPAlertList
-- Get the next mail message from the linked list
set aMsg = myPAlertList(mGetNextMsg)
if (aMsg > 0) then
--beep aMsg
put "PH"&aMsg into myPhoneMessage
--put (myPhoneMessage) into cast B11
puppetSound myPhoneMessage
end if
cursor 4go the framepuppetsound 0-- Call up the sound according to your vote..
--YRVote is passed from the invisible sprites above
--the voting buttons. It returns "aye" "nay" or "pres"
put YRVote&aMsg into PSound
sound playFile 01, "Capitol Hill:support:scsounds:"&PSoundvotehandlerpausego movie "Capitol Hill:support:PDA"phonehandlergo movie "Capitol Hill:support:Calendar"mailhandlercursor -1
set the volume of sprite 21=128global myMAlertList,mailBox
-- Get the next mail message from the linked list
set aMsg = myMAlertList(mGetNextMsg)
mailBox(mGetMail,aMsg,B11)set the cursor of sprite 6=0
set the cursor of sprite 7=0
set the cursor of sprite 8=0
repeat with i=193 to 195
put "_" into field i
end repeat
if soundbusy(1) then go the framesound fadeout 1,60go movie "Capitol Hill:support:Rolodex"puppetsound "s0"
set s=1
go "s"puppettransition 23
go "atDesk" if cs=1 then
puppetsound "c2"
else
set cs=1
puppetsound "c0"
end if
if field d11="X" or field d12="X" or field d13="X" then
puppettransition 23
go label("FP1")+2
else
go "FP1"
end if
put "Offices of Rep."&&repname into field "blue"
go "FlPln"spPhoneMSGgo the frame-1go movie "Capitol Hill:support:BgtPages"go marker(1)
votehandlerput "Nay" into YRVote
go the frame + 4put "Pres" into YRVote
go the frame + 8set the cursor of sprite 6=1011
set the cursor of sprite 7=1011
set the cursor of sprite 8=1011go to frame "Talleying"global theTxtHandler